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MODIFICATIONS TO SYMBOLIC 
EDITOR AND SYMBOLIC TAPE 


DECUS Progrom Library Write-up DECUS No. 8-185 

INTRODUCTION 


Tte ^rnm modifies Symbolic Editor. The chonges (I) facilitate use of the Editor in eonionction 
with DECtape or UNCtape backing store; (2) facilitate editing of tapes containing sections of 
leader/trailer code. 


OPERATION 


©The binary tape is read in over Symbolic Editor (DEC-08-ESAB of August 1967). If the modified 

program is filed by DECtape or LINCtape LIBRARY, the starting address is 200 and it occupies 
core locations 0 to 1577. 

FACILITIES CHANGED 


1. A command B, "print buffer point" has been added. This causes the octal number of 
the last location m the buffer occupied by the program to be printed on the Teletype. 

2. A command Qy , "return to LIBRARY" has been added. This transfers control to 
location 7600, the start of the DECtape or LINCtape LIBRARY system. 

3. The "buffer full" location has been set at 7560. 

4. The character 200, leader/trailer code, is input and output as a normal character. 

The commands y and Fy output 200 codes instead of blank tape. 

6. '^1'punching instructions, , F^ , and ^ , halt before output occurs, to 
enable the operator to turn the punch on. 

7. The command ly outputs about 6 inches of 200 code and then halts again. 

8. The command ^ outputs form feed followed by 3 inches of leader/trailer. 

9. The command , "Get tag", has been omitted. 

B and Qy facilitate storing of source language programs on magnetic tape. The procedure is: 
strike B to print out the last location used in the buffer, say nnnn; then to start LIBRARY. 
Type UPDATE; m answer to the successive queries output by UPDATE, ty^: - a name for the 
program,(it is the writer's practice to prefix E to the normal title of the program, if necessary 
shortened to 5 characters, to designate programs stored in this way); 177 for the starting address; 
and core locations <0,nnnn>;. The program is stored together with the Editor. 






% 


To reenter the program: type ESCAPE if nnnn exceeds 5777, or if the binary loader is required 
in the last page of core; enter 177 in switches, press LOAD ADD and then START; or recall the 
program by typing its name. 

The modifications to the routines associated with y,F^ and ^ enable leader/trailer sections 
of tape to be preserved or generated at editing. This is particularly valuable when a number of 
such sections occur on a tape, for example separating extensive comments from program to be 
compiled, or separating blocks of data. The original Editor loses these sections when the tape is 
input, and reinserting them at the time of punching the edited tape is awkward. Note that a final 
section of leader/trailer must be terminated by carriage return followed by form feed. (The final 
carriage return/line feed does not emerge beyond the punch at output). 


MODIFICATION TO SYMBOLIC TAPE FORMAT GENERATOR # 

INTRODUCTION 

This produces an acceptable format with fewer spaces than are output in the format produced by 
the standard program Digital 8-21. 

OPERATION 

The binary tape is read in over Digital 8-21. If filed on magnetic tape, update with SA-02G0 
and occupies core locations 0 - 777. 

FACILITIES CHANGED 

1. Normal lines of program text are indented 2 spaces from the margin, instead of 10. 

2. Text after tags begins 8 characters from the margin. 

3. Comments on program lines begine 24 characters from the margin. 

A symbolic program in this format is virtually as easy to read as one in the standard format. The 
total number of characters, however, is much less, particularly if comment on program lines is 
used sparingly. This leads to a valuable saving of editor buffer space, and, if only low-speed 
reading and punching equipment is available, of time also. 
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/ MODIFICATIONS TO SYMBOLIC EDITOR 
/ G. R. HERVEY 31/5/69 

/ TO INPUT AND OUTPUT 200 CODE AS CHARACTER 
/ AND OUTPUT 200 CODE AS TRAILER. 

/ HALTS AFTER T AND F COMMAND AS WELL AS P 
/ AND ON COMPLETION OF T. 

/ COMMAND G REPLACED BY Q: RETURN TO LIBRARY. 
/ NEW COMMAND B: PRINT LAST BUFFER LOCATION. 

/ BUFFER EXTENDED TO 7560. 

/ LOAD OVER SYMBOLIC EDITOR CDEC-08-ESABI: 

/ UPDATE WITH S. A. 200* CORE <0*1577>. 


M77 = 3 
C260= 16 
TE1=20 
C200=20 
CCR=24 
CLF=25 
C240=30 
0UTL1=73 
LOW=73 
BUFR=114 
VAL=117 
ARG2=12 1 
CHAR=122 
B0X=123 
CNT=124 
0PS2=371 
UT1=521 
PRNT=1017 
XYZ=1030 
133=1140 
LEAD=1227 
TSTOUT=1236 
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*200 


0200 

1073 

TAD LOW 



* 1 

0 001 

7560 

7560 



*22 

0 022 

1213 

DE1NST> TADCON 



*52 

0052 

10 50 

CHIN 



*54 

0054 

1051 

CHIN+1 



*60 

0 060 

1052 

INPAT 



*265 

0265 

0770 

LIST2-1 

0266 

7400 

0PS2-LIST2 



*304 

0 304 

1356 

BUFOUT 



*405 

0 405 

7600 

7600 



*526 

0 526 

7200 

CLA 

0 527 

5321 

JMP UTl 

0 530 

7602 

LEAD2^ CLA HL 

0 531 

1003 

TAD M77 

0 532 

4735 

JMS I LEAD I 

0 533 

7602 

CLA HLT 

0534 

5420 

JMP I TEl 

0 535 

1227 

LEADI* LEAD 



*576 

0576 

1051 

CHIN*1 
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♦ 771 


0 77 1 

0306 

LIST2, 

0 772 

0301 

301 

0773 

031 1 

31 1 

0774 

0303 

303 

0 775 

0313 

313 

0 776 

0304 

304 

0777 

0314 

314 

1 000 

0316 

316 

1 001 

0320 

320 

1 002 

0322 

322 

1 003 

0324 

324 

1 004 

0315 

315 

1 005 

0321 

321 

1 006 

0323 

323 

1 007 

7000 

C0N2* 

1010 

7700 

- 100 

1011 

7770 

- 10 

1012 

7777 

- 1 


CON=1013 
TADCON=TAD CON 
TADCN2=TAD C0N2 




*1023 


1 023 

1247 

TAD 

ADDR 

1 024 

3233 

DCA 

XYZ + 3 



♦ 1031 


1 031 

7100 

CLL 


1 032 

1117 

TAD 

VAL 

1 033 

7402 

HLT 


1 034 

7430 

SZL 


1 035 

522 7 

JMP 

XYZ- 1 

t 036 

7200 

CLA 


1 037 

1 123 

TAD 

BOX 

1 040 

1016 

TAD 

C260 

1 041 

4473 

JMS 

I OUTLl 

1 042 

2233 

ISZ 

XYZ + 3 

1 043 

2124 

ISZ 

CNT 

1 0'44 

5225 

JMP 

XYZ-3 

1 045 

5646 

JMP 

I . + 1 

1 046 

1366 

PRCON 

1 047 

1213 

ADDR> 

TADCON 

1 050 

0000 

CHIN, 

0 

1 051 

3122 

DCA 

CHAR 

1 052 

4340 

INPAT, 

JMS 133 

1 053 

7450 

SNA 

1 054 

5251 

JMP 

CHIN+1 
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♦ 1057 


1 057 


1115 


1210 


1 220 
1221 


1 230 
1231 


1 234 


1 264 
1 265 


1 301 


5650 JMP I CHIN 

♦ 1115 

1030 TAD C240 

♦ 12 10 

0302 302 

♦ 1220 

7602 FORM, CLA HLT 
4236 FORMN, JMS TSTOUT 

♦ 1230 

3236 DCA TSTOUT 

1020 TAD C200 

♦ 1234 

5231 JMP .-3 

♦ 1264 

5665 JMP I .+1 
0530 LEAD2 

♦ 1301 

5221 JMP FORMN 
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♦1356 


1 356 
1 357 
1 360 
1 361 
1 362 
1 363 
1 364 
1 365 

1 366 
1 367 
1 370 
1 371 
1 372 
1 373 
1 374 

1 375 
1 376 


1 462 


1114 BUFOUT> TAD BUFR 
3121 DCA ARG2 

1375 TAD OCINST 

3776 DCA I ADDRI 

1030 TAD C240 

4473 JMS I OUTLl 

5765 JMP I .+1 

1017 PRNT 

1022 PRCON, TAD DEINST 
3776 DCA I ADDRI 

1024 TAD CCR 

A473 JMS I OUTLl 

1025 TAD CLF 

4473 JMS I OUTLl 

5420 JMP I TEl 

1207 OCINST> TADCN2 
1047 ADDRI, ADDR 

* 1462 

1030 TAD C240 
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ADDR 

1047 

A DDR I 

1376 

ARG2 

0121 

BOX 

0123 

BUFOUT 

1356 

BUFR 

01 14 

OCR 

0024 

CHAR 

0122 

CHIN 

1050 

CLF 

0025 

CNT 

0124 

CON 

1013 

C0N2 

1007 

C200 

0020 

C240 

0030 

C260 

0016 

DEINST 

0022 

FORM 

1220 

FORMN 

1221 

I NPAT 

1052 

I 33 

1140 

LEAD 

1227 

LEAD I 

0535 

LEAD2 

0530 

LIST2 

0771 

LOW 

0073 

M77 

0003 

OCINST 

1375 

0PS2 

0371 

OUTLl 

0073 

PRCON 

1366 

PRNT 

1017 

TADCN2 

1207 

TADCON 

1213 

TEl 

0020 

TSTOUT 

1236 

UTl 

0521 

V AL 

0117 

X YZ 

1030 
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